Chip 1996 December/CHIP Aralık 1996.iso/ntprog/vf_nt40/vfwin.exe/0/RCDATA/TFORM1/TFORM1.txt

Text File | 1995-11-09 | 7KB | 321 lines

object Form1: TForm1
  Left = 259
  Top = 129
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'VF for Windows 95  v1.2  UNREGISTERED'
  ClientHeight = 240
  ClientWidth = 481
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  KeyPreview = True
  Position = poScreenCenter
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnPaint = FormPaint
  OnShow = RadioButton1Click
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 8
    Top = 72
    Width = 185
    Height = 105
  end
  object Bevel2: TBevel
    Left = 200
    Top = 72
    Width = 193
    Height = 105
  end
  object Image1: TImage
    Left = 440
    Top = 176
    Width = 33
    Height = 33
    Picture.Data = {<image001.ico>}
  end
  object Bevel3: TBevel
    Left = 8
    Top = 184
    Width = 385
    Height = 33
  end
  object RadioButton1: TRadioButton
    Left = 24
    Top = 80
    Width = 153
    Height = 17
    Caption = '&Open Folder'
    Checked = True
    TabOrder = 4
    TabStop = True
    OnClick = RadioButton1Click
  end
  object Button1: TButton
    Left = 400
    Top = 72
    Width = 75
    Height = 25
    Caption = '&Start'
    Default = True
    TabOrder = 0
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 400
    Top = 96
    Width = 75
    Height = 25
    Cancel = True
    Caption = 'E&xit'
    TabOrder = 1
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 400
    Top = 120
    Width = 75
    Height = 25
    Caption = '&Help'
    TabOrder = 2
    OnClick = Button3Click
  end
  object Button4: TButton
    Left = 400
    Top = 144
    Width = 75
    Height = 25
    Caption = 'A&bout'
    TabOrder = 3
    OnClick = Button4Click
  end
  object RadioButton2: TRadioButton
    Left = 24
    Top = 128
    Width = 113
    Height = 17
    Caption = 'Total &Free Space'
    TabOrder = 6
    OnClick = RadioButton2Click
    OnDblClick = Button1Click
  end
  object RadioButton3: TRadioButton
    Left = 24
    Top = 104
    Width = 113
    Height = 17
    Caption = 'Fi&nd Files'
    Color = clBtnFace
    ParentColor = False
    TabOrder = 5
    OnClick = RadioButton3Click
  end
  object RadioButton4: TRadioButton
    Left = 216
    Top = 104
    Width = 161
    Height = 17
    Caption = 'Scan &All drives except'
    Color = clBtnFace
    ParentColor = False
    TabOrder = 8
    OnClick = RadioButton4Click
  end
  object RadioButton5: TRadioButton
    Left = 216
    Top = 128
    Width = 161
    Height = 17
    Caption = 'Scan Drive and A&ppend'
    TabOrder = 9
    OnClick = RadioButton5Click
  end
  object RadioButton7: TRadioButton
    Left = 216
    Top = 80
    Width = 161
    Height = 17
    Caption = 'Scan All &Drives'
    TabOrder = 7
    OnClick = RadioButton7Click
  end
  object RadioButton8: TRadioButton
    Left = 216
    Top = 152
    Width = 161
    Height = 17
    Caption = 'Scan Drive &C Only'
    TabOrder = 10
    OnClick = RadioButton8Click
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 221
    Width = 481
    Height = 19
    Enabled = False
    Panels = <>
    SimplePanel = True
  end
  object Panel1: TPanel
    Left = 8
    Top = 8
    Width = 465
    Height = 25
    BevelWidth = 5
    BorderWidth = 1
    BorderStyle = bsSingle
    Caption = 'VF For Windows 95 (c) By Gisle Bjoerneseth - Norway 1996'
    Color = clActiveCaption
    Ctl3D = True
    Font.Color = clInactiveCaptionText
    Font.Height = -11
    Font.Name = 'Lucida Handwriting'
    Font.Style = [fsItalic]
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 13
  end
  object ComboBox1: TComboBox
    Left = 8
    Top = 40
    Width = 465
    Height = 21
    DropDownCount = 6
    ItemHeight = 13
    TabOrder = 11
  end
  object CheckBox1: TCheckBox
    Left = 24
    Top = 192
    Width = 169
    Height = 17
    Hint =
      'Opens the folder with the explorer instead of just opening the f' +
      'older'
    Caption = 'Use &Explorer when opening'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 14
    OnClick = CheckBox1Click
  end
  object CheckBox2: TCheckBox
    Left = 216
    Top = 192
    Width = 169
    Height = 17
    Caption = '&Tray instead of exit'
    TabOrder = 15
  end
  object WinThread1: TWinThread
    Left = 368
    Top = 152
    Width = 25
    Height = 25
    StackSize = 8192
    ThreadProc = WinThread1ThreadProc
    ThreadTerminate = WinThread1ThreadTerminate
  end
  object WinThread2: TWinThread
    Left = 368
    Top = 120
    Width = 25
    Height = 25
    StackSize = 8192
    ThreadProc = WinThread2ThreadProc
    ThreadTerminate = WinThread2ThreadTerminate
  end
  object TrayIcon1: TTrayIcon
    Active = False
    ShowDesigning = False
    Icon.Data = {<image002.ico>}
    ToolTip = 'VF for Windows 95'
    OnClick = TrayIcon1Click
    PopupMenu = PopupMenu1
    Left = 400
    Top = 176
  end
  object Timer1: TTimer
    Enabled = False
    Interval = 1800000
    OnTimer = Timer1Timer
    Left = 362
    Top = 186
  end
  object PopupMenu1: TPopupMenu
    Left = 328
    Top = 184
    object Open1: TMenuItem
      Caption = '&Open VF for Win95'
      ShortCut = 0
      OnClick = Open1Click
    end
    object DiskFree1: TMenuItem
      Caption = 'Disk &Free'
      ShortCut = 0
      OnClick = DiskFree1Click
    end
    object ScanNOW1: TMenuItem
      Caption = '&Scan Disks NOW !'
      ShortCut = 0
      OnClick = ScanNOW1Click
    end
    object N3: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object DisableAutoscan1: TMenuItem
      Caption = 'Disable Autoscan'
      ShortCut = 0
      OnClick = DisableAutoscan1Click
    end
    object N1: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object About1: TMenuItem
      Caption = '&Help'
      ShortCut = 0
      OnClick = About1Click
    end
    object About2: TMenuItem
      Caption = 'About VF for Win95'
      ShortCut = 0
      OnClick = About2Click
    end
    object N4: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object RestartComputer1: TMenuItem
      Caption = 'Restart Computer'
      ShortCut = 0
      OnClick = RestartComputer1Click
    end
    object ShutDownWIN1: TMenuItem
      Caption = 'Shutdown Computer'
      ShortCut = 0
      OnClick = ShutDownWIN1Click
    end
    object N2: TMenuItem
      Caption = '-'
      ShortCut = 0
    end
    object Setup1: TMenuItem
      Caption = 'Setup Scan Parameters'
      ShortCut = 0
      OnClick = Setup1Click
    end
    object ExitVfforWin951: TMenuItem
      Caption = 'E&xit VF for Win95'
      ShortCut = 0
      OnClick = ExitVfforWin951Click
    end
  end
end